home *** CD-ROM | disk | FTP | other *** search
Text File | 1998-08-17 | 2.9 KB | 116 lines | [TEXT/MPS ] |
- ;
- ; File: CMPRComponent.a
- ;
- ; Contains: ColorSync ProfileResponder Component API
- ;
- ; Version: Technology: ColorSync 1.0
- ; Release: Universal Interfaces 3.2
- ;
- ; Copyright: © 1993-1998 by Apple Computer, Inc. All rights reserved.
- ;
- ; Bugs?: For bug reports, consult the following page on
- ; the World Wide Web:
- ;
- ; http://developer.apple.com/bugreporter/
- ;
- ;
- IF &TYPE('__CMPRCOMPONENT__') = 'UNDEFINED' THEN
- __CMPRCOMPONENT__ SET 1
-
- IF &TYPE('__MACTYPES__') = 'UNDEFINED' THEN
- include 'MacTypes.a'
- ENDIF
- IF &TYPE('__QUICKDRAW__') = 'UNDEFINED' THEN
- include 'Quickdraw.a'
- ENDIF
- IF &TYPE('__COMPONENTS__') = 'UNDEFINED' THEN
- include 'Components.a'
- ENDIF
- IF &TYPE('__CMAPPLICATION__') = 'UNDEFINED' THEN
- include 'CMApplication.a'
- ENDIF
-
-
- CMPRInterfaceVersion EQU 0
- ; Component function selectors
-
- kCMPRGetProfile EQU 0
- kCMPRSetProfile EQU 1
- kCMPRSetProfileDescription EQU 2
- kCMPRGetIndexedProfile EQU 3
- kCMPRDeleteDeviceProfile EQU 4
-
- ;
- ; pascal CMError CMGetProfile(ComponentInstance pr, CMProfileHandle aProfile, CMProfileHandle *returnedProfile)
- ;
- IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
- Macro
- _CMGetProfile
- move.l #$00080000,-(sp)
- moveq #0,D0
- dc.w $A82A
- EndM
- ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
- IMPORT_CFM_FUNCTION CMGetProfile
- ENDIF
-
- ;
- ; pascal CMError CMSetProfile(ComponentInstance pr, CMProfileHandle newProfile)
- ;
- IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
- Macro
- _CMSetProfile
- move.l #$00040001,-(sp)
- moveq #0,D0
- dc.w $A82A
- EndM
- ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
- IMPORT_CFM_FUNCTION CMSetProfile
- ENDIF
-
- ;
- ; pascal CMError CMSetProfileDescription(ComponentInstance pr, long DeviceData, CMProfileHandle hProfile)
- ;
- IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
- Macro
- _CMSetProfileDescription
- move.l #$00080002,-(sp)
- moveq #0,D0
- dc.w $A82A
- EndM
- ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
- IMPORT_CFM_FUNCTION CMSetProfileDescription
- ENDIF
-
- ;
- ; pascal CMError CMGetIndexedProfile(ComponentInstance pr, CMProfileSearchRecordHandle search, CMProfileHandle *returnProfile, long *index)
- ;
- IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
- Macro
- _CMGetIndexedProfile
- move.l #$000C0003,-(sp)
- moveq #0,D0
- dc.w $A82A
- EndM
- ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
- IMPORT_CFM_FUNCTION CMGetIndexedProfile
- ENDIF
-
- ;
- ; pascal CMError CMDeleteDeviceProfile(ComponentInstance pr, CMProfileHandle deleteMe)
- ;
- IF TARGET_OS_MAC ** TARGET_CPU_68K ** ¬ TARGET_RT_MAC_CFM THEN
- Macro
- _CMDeleteDeviceProfile
- move.l #$00040004,-(sp)
- moveq #0,D0
- dc.w $A82A
- EndM
- ELSEIF TARGET_OS_MAC ** TARGET_RT_MAC_CFM THEN
- IMPORT_CFM_FUNCTION CMDeleteDeviceProfile
- ENDIF
-
-
- ENDIF ; __CMPRCOMPONENT__
-
-